home *** CD-ROM | disk | FTP | other *** search
/ Oz - The Magical Adventure / Adventure.iso / pc / dkdata / rockbal.dxr / 00044_test for completeness.ls < prev    next >
Encoding:
Text File  |  2000-06-01  |  361 b   |  16 lines
  1. on exitFrame
  2.   global gGameSol, gNumberOfMovesLeft, gDifficultyLevel, gResponses
  3.   if (gGameSol <> 0) and (gNumberOfMovesLeft > 0) then
  4.     lastMove = value(item 4 of gResponses)
  5.     put gGameSol into item 4 of gResponses
  6.     go("play")
  7.   else
  8.     if gGameSol = 0 then
  9.       puppetSprite(67, 0)
  10.       go("win")
  11.     else
  12.       go("lose")
  13.     end if
  14.   end if
  15. end
  16.